home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / b / b.lha / B / ex / try / 'FILL < prev    next >
Encoding:
Text File  |  1988-11-24  |  111 b   |  6 lines
  1. HOW'TO FILL text:
  2.     READ line RAW
  3.     WHILE line>'':
  4.         PUT line IN text[#text+1]
  5.         READ line RAW
  6.